home *** CD-ROM | disk | FTP | other *** search
/ Info-Mac 11 / Info-Mac_XI_Disc_1.cdr_ / Info-Mac XI Disc 1.cdr / Programs / Disk & File / touchMe 1.1.2 / sample scripts / sample 1 next >
Encoding:
Text File  |  1997-02-10  |  577 b   |  19 lines  |  [TEXT/ToyS]
  1. -- Sample AppleScripts for touchMe, 1996 (C) Mizutori Tetsuya
  2. -- A droplet to change the creation date to the date "8/1/96", 
  3. -- and the modification date according to the first dropped file
  4. -- To get a droplet, execute "Save As Run-Only..." command.
  5.  
  6. tell me to open {(choose file)}
  7.  
  8. on open (docList)
  9.     tell application "touchMe"
  10.         activate
  11.         --set theDate to current date
  12.         set theDate to date "8/1/96 12:10"
  13.         set prefs creation to {enabled:true, flag:exact, value:theDate}
  14.         set prefs modification to {enabled:true, flag:firstone}
  15.         touch docList
  16.         quit
  17.     end tell
  18. end open
  19.